home *** CD-ROM | disk | FTP | other *** search
/ SPACE 1 / SPACE - Library 1 - Volume 1.iso / utilitys / 613 / access / rename.bat < prev    next >
Encoding:
DOS Batch File  |  1991-10-19  |  338 b   |  14 lines
  1. if !{or !{not $1} !{not $2}}
  2.     return {Usage: rename[ -q] <search pathname> <name>}
  3. set 2 !{root $1}!{tail $2}
  4. for 3 $1 $2
  5.     if !{= $6 {>>>>>>}}
  6.         mkdir $4
  7.     elseif !{= $6 {<<<<<<}}
  8.         rmdir $3
  9.     else
  10.         block < $3 > $4
  11.             while !{not !eof}
  12.                 echo !input{\n}
  13.         block > $3
  14.